home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Archivers / UNPacker_V2.0 / Install next >
Text File  |  1996-09-26  |  2KB  |  83 lines
  1. ; UNPacker Installation Script
  2. ; Copyright © 1993-1995 by Ralph Torchia
  3. ; $VER:UNPacker v2.0 (09.17.95)
  4.  
  5. (set @PRGVersion "2.0")
  6.  
  7. (welcome
  8.   ("\nWelcome to the UNPacker %s installer script.\n\n" @PRGVersion)
  9.   ("    This version of UNPacker has documentation in AmigaGuide format.\n")
  10.   ("    Follow the installer script's instructions to install UNPacker.\n")
  11. )
  12.  
  13. (set @default-dest "SYS:Utilities")
  14.  
  15. (set @default-dest
  16.   (askdir
  17.     (prompt "Where would you like UNPacker installed?")
  18.     (help " The Utilities directory on your boot disk is a good place to put UNPacker.")
  19.     (default @default-dest)
  20.   )
  21. )
  22.  
  23. (copyfiles
  24.   (prompt "Copying UNPacker to %s" @default-dest)
  25.   (help @copyfiles-help)
  26.   (source "UNPacker")
  27.   (dest @default-dest)
  28. )
  29.  
  30. ;(
  31. ;  (if
  32. ;    (askbool
  33. ;      (prompt "Would you like to edit the prefs file now?")
  34. ;      (help " The prefs file needs to be modified if the default settings are not appropirate for your use.  This can be done before the installer is started, right now, or at a later time.")
  35. ;    )
  36. ;  (run "C:Ed UNPacker.prefs" (safe))
  37. ;  (message "Make sure when editing the UNPacker.prefs file that both th ENVARC: and ENV: copies are changed.")
  38. ; )
  39. ;)
  40.  
  41. (
  42.   (copyfiles
  43.     (prompt "Copying UNP.prefs to ENVARC:")
  44.     (help @copyfiles-help)
  45.     (source "UNP.prefs")
  46.     (dest "ENVARC:")
  47.   )
  48.   (copyfiles
  49.     (prompt "Copying UNPacker.prefs to ENV:")
  50.     (help @copyfiles-help)
  51.     (source "UNP.prefs")
  52.     (dest "ENV:")
  53.   )
  54. )
  55.  
  56. (set @icon-choice "UNPacker_Std")
  57. (
  58.   (set @choice
  59.     (askchoice
  60.       (prompt "Which icon would you like to have installed for UNPacker?")
  61.       (choices ("MagicWB Icon")
  62.                ("Standard Workbench Icon")
  63.               ("Standard Icon in 8 Colors")
  64.  
  65.       )
  66.       (help " The MagicWB icon is a larger, 8 color icon.  The standard icon and the 8 color icon follows Commodore's color and size standard.")
  67.     )
  68.   )
  69.   (if (= @choice 0) (set @icon-choice "UNPacker_Magic"))
  70.   (if (= @choice 1) (set @icon-choice "UNPacker_Std"))
  71.   (if (= @choice 2) (set @icon-choice "UNPacker_8col"))
  72. )
  73.  
  74. (copyfiles
  75.   (prompt "Copying icon for %s" @default-dest)
  76.   (help @copyfiles-help)
  77.   (source @icon-choice)
  78.   (dest @default-dest)
  79.   (newname "UNPacker.info")
  80. )
  81.  
  82. (exit)
  83.